home *** CD-ROM | disk | FTP | other *** search
- object BackupDlg: TBackupDlg
- Left = 288
- Top = 138
- HelpContext = 101
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Backup Procedure'
- ClientHeight = 406
- ClientWidth = 415
- Font.Color = clWindowText
- Font.Height = -14
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- TextHeight = 16
- object Bevel4: TBevel
- Left = 16
- Top = 312
- Width = 297
- Height = 33
- end
- object Bevel3: TBevel
- Left = 16
- Top = 32
- Width = 297
- Height = 33
- end
- object Bevel2: TBevel
- Left = 8
- Top = 288
- Width = 313
- Height = 65
- end
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 313
- Height = 273
- end
- object Label1: TLabel
- Left = 16
- Top = 16
- Width = 82
- Height = 16
- Caption = 'Source Path:'
- end
- object lblSource: TLabel
- Left = 24
- Top = 40
- Width = 281
- Height = 16
- AutoSize = False
- Caption = 'c:\cw_apps\backup'
- Font.Color = clMaroon
- Font.Height = -14
- Font.Name = 'System'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Label2: TLabel
- Left = 16
- Top = 296
- Width = 111
- Height = 16
- Caption = 'Destination Path:'
- end
- object lblDestination: TLabel
- Left = 24
- Top = 320
- Width = 257
- Height = 16
- AutoSize = False
- Caption = 'c:\cw_apps\backup'
- Font.Color = clMaroon
- Font.Height = -14
- Font.Name = 'System'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object SpeedButton1: TSpeedButton
- Left = 284
- Top = 316
- Width = 25
- Height = 25
- Hint = 'Select Target Directory'
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
- 333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
- 300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
- 333337F373F773333333303330033333333337F3377333333333303333333333
- 333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
- 333337777F337F33333330330BB00333333337F373F773333333303330033333
- 333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
- 333377777F77377733330BBB0333333333337F337F33333333330BB003333333
- 333373F7733333333333300333333333333337733333333333330000}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = SpeedButton1Click
- end
- object DirList: TDirectoryListBox
- Left = 16
- Top = 72
- Width = 145
- Height = 169
- DirLabel = lblSource
- FileList = FList
- ItemHeight = 16
- TabOrder = 0
- end
- object FList: TFileListBox
- Left = 168
- Top = 72
- Width = 145
- Height = 201
- ItemHeight = 16
- ShowGlyphs = True
- TabOrder = 1
- end
- object btnOK: TBitBtn
- Left = 328
- Top = 8
- Width = 81
- Height = 33
- Caption = 'C&opy'
- Default = True
- TabOrder = 2
- OnClick = btnOKClick
- OnKeyPress = btnOKKeyPress
- NumGlyphs = 2
- end
- object btnCancel: TBitBtn
- Left = 328
- Top = 48
- Width = 81
- Height = 33
- Caption = '&Close'
- TabOrder = 3
- OnClick = btnCancelClick
- NumGlyphs = 2
- end
- object Panel1: TPanel
- Left = 8
- Top = 360
- Width = 313
- Height = 41
- BevelInner = bvLowered
- BevelOuter = bvNone
- TabOrder = 4
- Visible = False
- object Gauge1: TGauge
- Left = 8
- Top = 8
- Width = 297
- Height = 25
- Progress = 0
- end
- end
- object BitBtn1: TBitBtn
- Left = 328
- Top = 88
- Width = 81
- Height = 33
- Caption = '&Help'
- TabOrder = 5
- OnClick = BitBtn1Click
- NumGlyphs = 2
- end
- object driveBox: TDriveComboBox
- Left = 16
- Top = 250
- Width = 145
- Height = 22
- DirList = DirList
- TabOrder = 6
- end
- end
-